PACKAGE Exp IS
   PROCEDURE ExpBis (A: IN OUT Integer; B: IN OUT Integer; C: OUT Integer);
   PROCEDURE ExpLin (B: IN Integer; E: IN Integer; X: OUT Integer);
END Exp;